600
How can include the values in the inner cells in the drop down filter window

local var_Column as IColumn
local var_Items as IItems
local s as USUAL

oDCOCX_Exontrol1:DrawGridLines := exRowLines
oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
oDCOCX_Exontrol1:[Description,exFilterBarBlanks] := ""
oDCOCX_Exontrol1:[Description,exFilterBarNonBlanks] := ""
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Single Column")}
	var_Column:HTMLCaption := "Single column with <b>inner cells</b>"
	var_Column:ToolTip := "Click the drop down filter button, and the filter list includes the inner cells values too."
	var_Column:DisplayFilterButton := true
	var_Column:DisplayFilterPattern := false
	var_Column:FilterList := exIncludeInnerCells
oDCOCX_Exontrol1:ShowFocusRect := false
var_Items := oDCOCX_Exontrol1:Items
	s := var_Items:[SplitCell,var_Items:AddItem("S 1.1"),0]
	var_Items:[CellCaption,nil,s] := "S 1.2"
	var_Items:[CellHAlignment,nil,s] := CenterAlignment
	var_Items:[CellBackColor,nil,s] := 0x1000000
	var_Items:[CellWidth,nil,s] := 84
	s := var_Items:[SplitCell,var_Items:AddItem("S 2.1"),0]
	var_Items:[CellCaption,nil,s] := "S 2.2"
	var_Items:[CellHAlignment,nil,s] := CenterAlignment
	var_Items:[CellWidth,nil,s] := 84
	s := var_Items:[SplitCell,var_Items:AddItem("S 3.1"),0]
	var_Items:[CellCaption,nil,s] := "S 3.2"
	var_Items:[CellHAlignment,nil,s] := CenterAlignment
	var_Items:[CellBackColor,nil,s] := 0x1000000
	var_Items:[CellWidth,nil,s] := 84

599
How can I sort the value gets listed in the drop down filter window

local var_Column,var_Column1 as IColumn
local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:LinesAtRoot := exLinesAtRoot
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:[Description,exFilterBarAll] := ""
oDCOCX_Exontrol1:[Description,exFilterBarBlanks] := ""
oDCOCX_Exontrol1:[Description,exFilterBarNonBlanks] := ""
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("P1")}
	var_Column:DisplayFilterButton := true
	var_Column:DisplayFilterPattern := false
	var_Column:FilterList := exSortItemsDesc
var_Column1 := IColumn{oDCOCX_Exontrol1:Columns:Add("P2")}
	var_Column1:DisplayFilterButton := true
	var_Column1:DisplayFilterPattern := false
	var_Column1:FilterList := exSortItemsAsc
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Z3")
	var_Items:[CellCaption,h,1] := "C"
	var_Items:[CellCaption,var_Items:InsertItem(h,nil,"Z1"),1] := "B"
	var_Items:[CellCaption,var_Items:InsertItem(h,nil,"Z2"),1] := "A"
	var_Items:[ExpandItem,h] := true

598
Is there a way to break the hours into 15 minute increments just showing lines instead of the minute numbers

local var_Level,var_Level1 as ILevel

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20080205")
oDCOCX_Exontrol1:Chart:LevelCount := 3
oDCOCX_Exontrol1:Chart:[Level,0]:Label := "<b><%mmm%> <%dd%></b> <%yyyy%> "
var_Level := oDCOCX_Exontrol1:Chart:[Level,1]
	var_Level:Label := "<%hh%>"
	var_Level:Alignment := CenterAlignment
var_Level1 := oDCOCX_Exontrol1:Chart:[Level,2]
	var_Level1:Label := ""
	var_Level1:Unit := exMinute
	var_Level1:Count := 15
oDCOCX_Exontrol1:Chart:UnitWidth := 6
oDCOCX_Exontrol1:EndUpdate()

597
How can I change the visual appearance of the milestone bar using EBN

local var_Appearance as IAppearance
local var_Bar as IBar
local var_Chart as IChart
local var_Items as IItems

var_Appearance := oDCOCX_Exontrol1:VisualAppearance
	var_Appearance:Add(1,"gBFLBCJwBAEHhEJAEGg4BKMMQAAYAQGKIYBkAKBQAGaAoDDMMILQiMQwjRBMKgBBCLIxiGK4DhiF4aRTHUKAAKQahLEaSZLhEZRQiqA4sS5FQBSBDQFwSByEY6mSaYJAWK4tCyNM7SfQAbxnAgYaLAAYRUjuHZOTZAc4UfAdFL/K4AKrfeZIeAiCRQGiYZyHKaRShjDwXKLIIjbJhkNoJChCNQgBScPgxCx8JypaCaar2fjQM6zWAMdb2Cz7PjDH7wPA1WYJRaDYjhcB4LheAqGXBWUYLYb8XS3EKJYhiWA4HjqFjGJpcEzPbRiNx3H6SABlLLaLo7JpGO52FrTHZjXyzLqBVpoOyEbrmcozYzjN41RpWETfQYDcwteqcLprhGVZrm6dp8j4bAnDQP5Uh+OpcH6R4Lg2YJvEIeg6kWEoJB2ZZyG6GoLCSXxtG+IZ1GmfhJjcawNFWfB/h+V5pnUc5VhWeZ4BMX4jlySwtiAJodlEYRaBYFgHHgIA2gGExkFUdxFl6A5hgUbgXgcVRzFiXA3CICARAEgI")
	var_Appearance:Add(2,"CP:1 -6 0 5 0")
var_Chart := oDCOCX_Exontrol1:Chart
	var_Chart:FirstVisibleDate := SToD("20010101")
	var_Bar := var_Chart:Bars:Add("MilestoneEBN")
		var_Bar:Color := 0x2000000
		var_Bar:Height := 14
oDCOCX_Exontrol1:Columns:Add("Tasks")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Milestone"),"Milestone",SToD("20010102"),SToD("20010102 00:00:01"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Milestone EBN "),"MilestoneEBN",SToD("20010102"),SToD("20010102 00:00:01"),nil,nil)

596
How can I change the visual appearance of the summary bar using EBN

local var_Bar as IBar
local var_Chart as IChart
local var_Items as IItems

oDCOCX_Exontrol1:VisualAppearance:Add(1,"gBFLBCJwBAEHhEJAEGg4BGICg6AADACAxRDAMgBQKAAzQFAYZhhBaERiGEaIJhUAIIRZGMQxXAcMQvDSKQJhGDAADEMgyAJCIxjPIgZBoGqPBpASQJUhkMocR7HMygBIkSRNA8kMwxdQEaw9ECRIDpGaYWTFDhsABTVQRLL0Tw9ISERqoSSaGgkCYaA7CNJ0PBNJSjJ6LJZGURbKqyCQ1DBbUB3BaUaQ9JaKa7pKa7cpWKIqSxEMrxcLFcT5DSbYDxGjLEhmPZBVZQNBxtJbFQHWJCNgzVAdOAAfzQM70GpMQoWJYeVpEObSBD1dABTCBczADYoex7ID+aJuGiYVZdWxJOjfbhkTTIJAaCawABrWxR8iHN5paTnUpzDjwbg0kqRRyr+XwjA8Go/HSBp6g6KJTFcGpWmYdg8H6dJTH0EZelueBfBuLwyBMd50nIfR+kmXB4BECQUAaEYMHQHRHCGFRYI2ZAwEIExghQZA2EIQoGGoEhOgGBBYlAeYYHMWJcDcGx4HYHoHmICIFjeBohkaDAAC2DAjBYJIIiKSI2CSC5hjQJBsCOCwYiIKoGmKWJkn6DANkiWgzCwYwolAcQkksWJaCuDohlicg2hDQR+EELBInKcJohMJBomILoGmISQuESFBOgkOQDg+SoTEyfoXCUSImDyGZhjkaI1hcJgTnoXgACYCYKG2GQkEkVJchKIoZDIbIciYKY+HEP4mlmThSg+aBIlKBYUCUKgGHyG4jEkPoKiAKI6D6EokGkSgyECF5jEKVJZD+aYqHKG4nGoCh+iKJ4qEqBokh+KYag6JoqmqKo2iWJpqgKRJHDiT5qk6NYtCsapmjiLprHqdo6i8awan6QovCwOp6kSLQsBsHpGjKbBbBaMYhm0CgalILBtBsUpTiGUIUAQgIA==")
var_Chart := oDCOCX_Exontrol1:Chart
	var_Chart:FirstVisibleDate := SToD("20010101")
	var_Bar := var_Chart:Bars:Copy("Task","Summary")
		var_Bar:Color := 0x1000000
		var_Bar:Height := 16
oDCOCX_Exontrol1:Columns:Add("Tasks")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Task 2"),"Summary",SToD("20010105"),SToD("20010107"),nil,nil)

595
How can I change the visual appearance of the task bar using EBN

local var_Bar as IBar
local var_Chart as IChart
local var_Items as IItems

oDCOCX_Exontrol1:VisualAppearance:Add(1,"gBFLBCJwBAEHhEJAEGg4BGoCg6AADACAxRDAMgBQKAAzQFAYZhhBaERiGEaIJhUAIIRZGMQxXAcMQvDSKQJhGLhQiSJoJDSBEgSXDIZQ5D6OZYACDJQACJYJTbAYzyPJkPRAA6EZCmGAwCglf5HABRb7xNLkbQ8GySKJnWCQJhoD5BSLCNRUTRFFQtGgZBpEWwLCjQNQwWLKFoTJIEPSBDKqYDoKYqTgOOZOThHQz3HakQRdAa/ZpnaKpUo2d47XjMWBwGA0EzeAAGaxoShqdoiFaGU7UOJVJBOGwHK6BchoMAKbp6XoVWRaOAWLZWVABM7XLZxbLccyGfZ1XhdV5UbqUMznR7PNrjLKIJpCOJbbyAFwgBaeQABYLhK7iHRmi8XYwjMWpjFWOx1GIB5LmgdB4HCEBECSIBpDGHQOicIwokYPImikEIJj6eJIloEgogSc40FGcJEFiYZIG2VIoAURw1g2QxyAQNwNAMPJOgIYI4CoDIBmAeAKBIUpQDUKJYDoTpIB4vxgmgdgNgeYZDDoFw7CEJhQn+BohmKfImCWSZRlgYwikYMQ0gwF4DniTA/gwBJYjQYwsgoIg6AyCRQDiIJODAZBImoOguAmMZ4lQLIJjOMI3CYZJpEIT4KiKSI6DqD5ZGAAgHC2DAjBYR4SGUGYGE+GIlCmFhRhIB5iFAbwWsiJgMhoCoxngV4ZCcSYOHaGYnHmIg8COJpoCoOISmSWZeHWHgoEkRoAg4EIYB4NogmiSgKg6GRjGoJgFh+ZJKDaBYjmgaQygiBRUHmbhoDsTAyiqIIoioGoOw8aoKhKKoemeOIaAeF5HmqHoqiyKxKgYaN/locgBiuZRojoVIok8cwsjaMBLGqDoAhGIpoEYWYEmAIxUkQLZmgiYg2g2I4JiCQwuAqWIOIkEAQICA==")
var_Chart := oDCOCX_Exontrol1:Chart
	var_Chart:FirstVisibleDate := SToD("20010101")
	var_Bar := var_Chart:Bars:[Item,"Task"]
		var_Bar:Color := 0x1000000
		var_Bar:Height := 16
oDCOCX_Exontrol1:Columns:Add("Tasks")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Task 2"),"Task",SToD("20010105"),SToD("20010107"),nil,nil)

594
How can I change the visual appearance of the task bar using EBN

local var_Bar as IBar
local var_Chart as IChart
local var_Items as IItems

oDCOCX_Exontrol1:VisualAppearance:Add(1,"gBFLBCJwBAEHhEJAEGg4BZsIQAAYAQGKIYBkAKBQAGaAoDDMMILQiMQwjRBMKgBBCLIxiGK4DhiGoZATCMbDBIcSwSGgCJCjeS4ZDKHIXSxFUKTBAcSQTGyBRokaYZRi6A4+TRPETTWAEcABHSbQCoKTKAoCHpLQLMYxDKItJSpGYaRgqWCaZpuUIaUzKVbxbK9CSMGiQbIsOJrBqqQozWZHVITLR9VgBNqga7uGR5DoqdovU5dVTVda9Ly5LSsMQvfALCqOe45URdNp3RiVBYfI6+cZvfJLWh4NqeAbCMC1UJoYhlUKCBg0TRoVo9AIDX5QWaYXC0AkBA==")
var_Chart := oDCOCX_Exontrol1:Chart
	var_Chart:FirstVisibleDate := SToD("20010101")
	var_Bar := var_Chart:Bars:[Item,"Task"]
		var_Bar:Color := 0x1000000
		var_Bar:Height := 16
oDCOCX_Exontrol1:Columns:Add("Tasks")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Task 2"),"Task",SToD("20010105"),SToD("20010107"),nil,nil)

593
How can I clip the HTML text or caption inside the bar

local var_Bar as IBar
local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Bar := oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]
	var_Bar:Pattern := exPatternBox
	var_Bar:Height := 13
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1","This is a bit of text that get's clipped")
	var_Items:[ItemBar,h,"K1",exBarHAlignCaption] := 3

592
How can I align the text/caption on the scroll bar


oDCOCX_Exontrol1:[ScrollPartCaption,exHScroll,exLowerBackPart] := "left"
oDCOCX_Exontrol1:[ScrollPartCaptionAlignment,exHScroll,exLowerBackPart] := LeftAlignment
oDCOCX_Exontrol1:[ScrollPartCaption,exHScroll,exUpperBackPart] := "right"
oDCOCX_Exontrol1:[ScrollPartCaptionAlignment,exHScroll,exUpperBackPart] := RightAlignment
oDCOCX_Exontrol1:ColumnAutoResize := false
oDCOCX_Exontrol1:Columns:Add(AsString(1))
oDCOCX_Exontrol1:Columns:Add(AsString(2))
oDCOCX_Exontrol1:Columns:Add(AsString(3))
oDCOCX_Exontrol1:Columns:Add(AsString(4))

591
How do I programmatically control the position of the horizontal scroll bar in the chart area, so I can specify a range of dates to scorll within

local var_Chart as IChart
local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Columns:Add("Task")
var_Chart := oDCOCX_Exontrol1:Chart
	var_Chart:LevelCount := 2
	var_Chart:[PaneWidth,false] := 56
	var_Chart:[ScrollRange,exStartDate] := SToD("20010101")
	var_Chart:[ScrollRange,exEndDate] := SToD("20010131")
	var_Chart:FirstVisibleDate := SToD("20010112")
oDCOCX_Exontrol1:[ScrollPartCaption,exHChartScroll,exLowerBackPart] := AsString(oDCOCX_Exontrol1:Chart:[ScrollRange,exStartDate])
oDCOCX_Exontrol1:[ScrollPartCaptionAlignment,exHChartScroll,exLowerBackPart] := LeftAlignment
oDCOCX_Exontrol1:[ScrollPartCaption,exHChartScroll,exUpperBackPart] := AsString(oDCOCX_Exontrol1:Chart:[ScrollRange,exEndDate])
oDCOCX_Exontrol1:[ScrollPartCaptionAlignment,exHChartScroll,exUpperBackPart] := RightAlignment
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010115"),SToD("20010118"),"K1",nil)
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010105"),SToD("20010111"),"K1",nil)
oDCOCX_Exontrol1:EndUpdate()

590
How can I programmatically control the position of the "splitter" between the item list on the left side and the gantt chart on the right


oDCOCX_Exontrol1:Chart:[PaneWidth,true] := 196

589
How can I add a milestone bar and some text in the chart area

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Milestone",SToD("20010102"),SToD("20010102"),nil,"<a1>text</a> outside")
	var_Items:[ItemBar,h,nil,exBarHAlignCaption] := 18

588
How can I display or align the bar's caption or text outside of the bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:DefaultItemHeight := 32
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010103"),SToD("20010105"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarCaption] := "<b>to do</b>"
	var_Items:[ItemBar,h,"K1",exBarHAlignCaption] := 18
	var_Items:[ItemBar,h,"K1",exBarVAlignCaption] := 16

587
How can I display or align the bar's caption or text outside of the bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010104"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarCaption] := "to do"
	var_Items:[ItemBar,h,"K1",exBarHAlignCaption] := 16

586
How can I display or align the bar's caption or text outside of the bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarCaption] := "to do "
	var_Items:[ItemBar,h,"K1",exBarHAlignCaption] := 18

585
Is there any option to count the non-working days
local var_Items as IItems
local h,var_ItemBar as USUAL

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20020101")
oDCOCX_Exontrol1:Columns:Add("Task")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20020102"),SToD("20020104"),"A",nil)
	var_ItemBar := var_Items:[ItemBar,h,"A",exBarNonWorkingCount]
oDCOCX_Exontrol1:EndUpdate()

584
Is there any option to count or to specify the working days
local var_Items as IItems
local h,var_ItemBar as USUAL

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20020101")
oDCOCX_Exontrol1:Columns:Add("Task")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20020102"),SToD("20020104"),"A",nil)
	var_ItemBar := var_Items:[ItemBar,h,"A",exBarWorkingCount]
oDCOCX_Exontrol1:EndUpdate()

583
How do I select the next row/item

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddItem("Item 1")
	var_Items:AddItem("Item 2")
	var_Items:AddItem("Item 3")
	var_Items:[SelectItem,var_Items:[NextVisibleItem,var_Items:FocusItem]] := true

582
How do I define the visual appearance of the bar by using your EBN/skin files

local var_Items as IItems

oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
oDCOCX_Exontrol1:Chart:Bars:Copy("Task","EBN"):Color := 0x1000000
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"EBN",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Item 2"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

581
Is it possible to have an "empty box" pattern for the bars

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:Copy("Task","Box"):Pattern := exPatternBox
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Box",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

580
How do I enable resizing ( changing the height ) the items at runtime

local var_Items as IItems

oDCOCX_Exontrol1:ItemsAllowSizing := exResizeItem
oDCOCX_Exontrol1:DrawGridLines := exHLines
oDCOCX_Exontrol1:ScrollBySingleLine := true
oDCOCX_Exontrol1:Columns:Add("Column")
oDCOCX_Exontrol1:Items:AddItem("Item 1")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:[ItemHeight,var_Items:AddItem("Item 2")] := 48
oDCOCX_Exontrol1:Items:AddItem("Item 3")

579
How do I enable resizing all the items at runtime

local var_Items as IItems

oDCOCX_Exontrol1:ItemsAllowSizing := exResizeAllItems
oDCOCX_Exontrol1:DrawGridLines := exHLines
oDCOCX_Exontrol1:Columns:Add("Column")
oDCOCX_Exontrol1:Items:AddItem("Item 1")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:[ItemHeight,var_Items:AddItem("Item 2")] := 48
oDCOCX_Exontrol1:Items:AddItem("Item 3")

578
I'm trying to use the percentage display in my gantt's bars. Unfortunately, I don't see any percentage on the gantt chart

local var_Bar as IBar
local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Bar := oDCOCX_Exontrol1:Chart:Bars:Copy("Task","BarName")
	var_Bar:Color := RGB(255,0,0)
	var_Bar:Pattern := exPatternBDiagonal
oDCOCX_Exontrol1:Chart:Bars:Add("BarName%Progress"):Shortcut := "Percent"
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Percent",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.4
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true

577
How I can show Months in Time Unit panel into Roman numerals

local var_Level as ILevel

oDCOCX_Exontrol1:Chart:LevelCount := 2
oDCOCX_Exontrol1:Chart:[Level,0]:Label := 0
var_Level := oDCOCX_Exontrol1:Chart:[Level,1]
	var_Level:Label := "<%mr%>"
	var_Level:Unit := exMonth

576
Can I show a bar with a different vertical position

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Opaque")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	h := var_Items:AddItem("Transparent and Opaque")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarOffset] := "-3"
	var_Items:[ItemBar,h,"K1",exBarTransparent] := 80
	var_Items:AddBar(h,"Task",SToD("20010103"),SToD("20010107"),"K2",nil)

575
How can I show transparent and opaque bars in the same chart

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Opaque")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	h := var_Items:AddItem("Transparent and Opaque")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarOffset] := "-3"
	var_Items:[ItemBar,h,"K1",exBarTransparent] := 80
	var_Items:AddBar(h,"Task",SToD("20010103"),SToD("20010107"),"K2",nil)

574
How can I draw bars using transparent colors

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Chart:ShowTransparentBars := 60
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Copy("Task","TaskR"):Color := RGB(255,0,0)
oDCOCX_Exontrol1:Chart:[PaneWidth,false] := 48
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Item 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010105"),"A",nil)
	var_Items:AddBar(h,"TaskR",SToD("20010104"),SToD("20010107"),"B",nil)

573
Can I change the Task bar so it display a Progress or a Percent bar, but it is splitted when the task intersect a non working area

local var_Chart as IChart
local var_Items as IItems
local h as USUAL

var_Chart := oDCOCX_Exontrol1:Chart
	var_Chart:FirstVisibleDate := SToD("20010101")
	var_Chart:Bars:Add("Task%Progress:Split"):Shortcut := "Task"
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Item 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010116"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.15
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true

572
Can I change the Task bar so it display a Progress or a Percent bar

local var_Chart as IChart
local var_Items as IItems
local h as USUAL

var_Chart := oDCOCX_Exontrol1:Chart
	var_Chart:FirstVisibleDate := SToD("20010101")
	var_Chart:Bars:Add("Task%Progress"):Shortcut := "Task"
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Item 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010105"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.15
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true

571
How can I remove the filter

local var_Column as IColumn

var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Column")}
	var_Column:DisplayFilterButton := true
	var_Column:FilterType := exBlanks
oDCOCX_Exontrol1:ApplyFilter()
oDCOCX_Exontrol1:ClearFilter()

570
I use the ShowEmptyBars property, but I display seconds from 15 to 15, and the bars are not shown correctly. What can I do

local var_Chart as IChart
local var_Items as IItems
local var_Level as ILevel
local h as USUAL

oDCOCX_Exontrol1:BeginUpdate()
var_Chart := oDCOCX_Exontrol1:Chart
	var_Chart:FirstVisibleDate := SToD("20020101")
	var_Chart:LevelCount := 2
	var_Chart:[Level,0]:Label := 1048576
	var_Level := var_Chart:[Level,1]
		var_Level:Label := "<%ss%>"
		var_Level:Count := 15
	var_Chart:ShowEmptyBars := 15
	var_Chart:ShowEmptyBarsUnit := exSecond
	var_Chart:[PaneWidth,false] := 48
oDCOCX_Exontrol1:Columns:Add("Task")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20020101 00:00:15"),SToD("20020101 00:00:15"),"A",nil)
	var_Items:AddBar(h,"Task",SToD("20020101 00:01:15"),SToD("20020101 00:01:30"),"B",nil)
	var_Items:AddLink("AB",h,"A",h,"B")
oDCOCX_Exontrol1:EndUpdate()

569
I need the bar works like in the MS Project, where task from 1/1/2001 to 1/1/2001 must display 1 day

local var_Items as IItems

oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:ShowEmptyBars := 1
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010101"),SToD("20010101"),nil,nil)

568
I have a bar that has the start and end date identical. Nothing is displayed. What can I do

local var_Items as IItems

oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:ShowEmptyBars := 1
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010102"),nil,nil)

567
How can I display seconds and bars for 15 to 15

local var_Items as IItems
local var_Level as ILevel
local h as USUAL

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Chart:FirstVisibleDate := "1/1/2002 00:00"
oDCOCX_Exontrol1:Chart:LevelCount := 2
oDCOCX_Exontrol1:Chart:[Level,0]:Label := 1048576
var_Level := oDCOCX_Exontrol1:Chart:[Level,1]
	var_Level:Label := "<%ss%>"
	var_Level:Count := 15
oDCOCX_Exontrol1:Chart:[PaneWidth,false] := 48
oDCOCX_Exontrol1:Chart:Bars:Copy("Task","Task2"):Color := RGB(255,0,0)
oDCOCX_Exontrol1:Columns:Add("Task")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task","1/1/2002 00:00:15","1/1/2002 00:00:45","A",nil)
	var_Items:AddBar(h,"Task2","1/1/2002 00:01:15","1/1/2002 00:01:45","B",nil)
	var_Items:AddLink("AB",h,"A",h,"B")
oDCOCX_Exontrol1:EndUpdate()

566
How can I copy a predefined bar

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:Copy("Task","T2"):Color := RGB(255,0,0)
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"T2",SToD("20010102"),SToD("20010104"),nil,nil)

565
How can I define my own custom bar, using my icons or pictures

local var_Bar as IBar
local var_Bars as IBars
local var_Items as IItems

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
var_Bars := oDCOCX_Exontrol1:Chart:Bars
	var_Bars:AddShapeCorner(12345,1)
	var_Bars:AddShapeCorner(22345,2)
	var_Bar := var_Bars:Add("T2")
		var_Bar:StartShape := 0x5740 | exShapeIconCircleUp1
		var_Bar:EndShape := 0x3020 | exShapeIconVBar | exShapeIconRight
		var_Bar:EndColor := RGB(255,0,0)
		var_Bar:Pattern := exPatternDot
		var_Bar:Color := RGB(255,0,255)
		var_Bar:Shape := exShapeThinCenter
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"T2",SToD("20010102"),SToD("20010104"),nil,nil)

564
How can I access a predefined bar

local var_Items as IItems

oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)
oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]:Color := RGB(255,0,0)

563
How can I access a predefined bar

local var_Items as IItems

oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)
oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]:Color := RGB(255,0,0)

562
How can I remove all predefined bars
local var_Items as IItems

oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

561
How can I remove a predefined bar
local var_Items as IItems

oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

560
How do I get the number of predefined bars

oDCOCX_Exontrol1:Columns:Add(AsString(oDCOCX_Exontrol1:Chart:Bars:Count))

559
How can I change the height of the task bar

local var_Bar as IBar
local var_Items as IItems
local h as USUAL

var_Bar := oDCOCX_Exontrol1:Chart:Bars:Copy("Task","T2")
	var_Bar:Height := 24
	var_Bar:EndShape := exShapeIconDown1
	var_Bar:EndColor := RGB(255,0,0)
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Item 1")
	var_Items:[ItemHeight,h] := 28
	var_Items:AddBar(h,"T2",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Item 2"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

558
How can I change the ending shape for all task bars

local var_Bar as IBar
local var_Items as IItems

var_Bar := oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]
	var_Bar:EndShape := exShapeIconUp1
	var_Bar:EndColor := RGB(255,0,0)
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

557
How can I change the height of the task bar

local var_Items as IItems

oDCOCX_Exontrol1:DefaultItemHeight := 28
oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]:Height := 24
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Item 2"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

556
How can I change the starting shape for all task bars

local var_Bar as IBar
local var_Items as IItems

var_Bar := oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]
	var_Bar:StartShape := exShapeIconUp1
	var_Bar:StartColor := RGB(255,0,0)
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

555
How can I change the height of the task bar

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:Copy("Task","T2"):Height := 17
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"T2",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Item 2"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

554
How can I change the height for all task bars

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]:Height := 17
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

553
How can I change the color of the task bar

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:Copy("Task","T2"):Color := RGB(255,0,0)
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"T2",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Item 2"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

552
How can I change the color for all task bars

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]:Color := RGB(255,0,0)
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

551
How can I change the shape for all task bars

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]:Shape := exShapeSolidDown
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

550
How can I change the shape of the task bar

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:Copy("Task","T2"):Shape := exShapeThinCenter
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"T2",SToD("20010102"),SToD("20010104"),nil,nil)

549
How can I change the pattern or style for all task bars

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:[Item,"Task"]:Pattern := exPatternFDiagonal
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

548
How can I change the pattern of the task bar

local var_Items as IItems

oDCOCX_Exontrol1:Chart:Bars:Copy("Task","T2"):Pattern := exPatternFDiagonal
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Item 1"),"T2",SToD("20010102"),SToD("20010104"),nil,nil)
	var_Items:AddBar(var_Items:AddItem("Item 2"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

547
How can I add a percent bar in the chart area, so the task bar is splited for non working days or hours

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress:Split"):Shortcut := "TS"
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"TS",SToD("20010102"),SToD("20010116"),"P1",nil)
	var_Items:[ItemBar,h,"P1",exBarPercent] := 0.14
	var_Items:[ItemBar,h,"P1",exBarShowPercentCaption] := true

546
How can I add a bar in the chart area, so the task bar is splited for non working days or hours

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:Bars:Add("Task:Split"):Shortcut := "TS"
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"TS",SToD("20010102"),SToD("20010116"),nil,nil)

545
How can I add a split bar in the chart area

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Split",SToD("20010102"),SToD("20010106"),nil,nil)

544
How can I add a progress bar in the chart area

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Progress",SToD("20010102"),SToD("20010106"),nil,nil)

543
How can I add a milestone bar in the chart area

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Milestone",SToD("20010102"),SToD("20010102"),nil,nil)

542
How can I add a summary bar in the chart area

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Summary",SToD("20010102"),SToD("20010106"),nil,nil)

541
How can I add a project summary bar in the chart area

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Project Summary",SToD("20010102"),SToD("20010106"),nil,nil)

540
How can I add a deadline bar in the chart area

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Deadline",SToD("20010102"),SToD("20010102"),nil,nil)

539
How can I add a task bar in the chart area

local var_Items as IItems

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddBar(var_Items:AddItem("Task 1"),"Task",SToD("20010102"),SToD("20010104"),nil,nil)

538
How can I assign a picture or an icon to a bar in the chart

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:[HTMLPicture,"p1"] := "c:\exontrol\images\zipdisk.gif"
oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:[ItemHeight,h] := 48
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarCaption] := "<img>p1</img>"
	var_Items:[ItemBar,h,"K1",exBarHAlignCaption] := 2

537
How can I assign a picture or an icon to a bar in the chart

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarCaption] := "<img>1</img>"

536
How can I display or add an anchor or a hyperlink in the link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010101"),SToD("20010103"),"K1",nil)
	var_Items:AddItem("")
	var_Items:AddItem("")
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkText] := "just <a1>link</a>"

535
How can I display a picture or an icon on the link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010101"),SToD("20010103"),"K1",nil)
	var_Items:AddItem("")
	var_Items:AddItem("")
	var_Items:AddItem("")
	var_Items:AddItem("")
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkText] := "just <img>1</img> link"

534
How can I display a picture or an icon on the link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:[HTMLPicture,"pic1"] := "c:\exontrol\images\zipdisk.gif"
oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010101"),SToD("20010103"),"K1",nil)
	var_Items:AddItem("")
	var_Items:AddItem("")
	var_Items:AddItem("")
	var_Items:AddItem("")
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkText] := "<img>pic1</img><br><br>just a link"

533
How can I display some HTML text or caption on link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010101"),SToD("20010103"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkText] := "L<b>1</b>"

532
How can I assign a tooltip to a link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010101"),SToD("20010103"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkText] := "L<b>1</b>"
	var_Items:[Link,"L1",exLinkToolTip] := "This is a bit of text that's shown when the cursor hovers the link"

531
Can I change the width or the size of the link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkStyle] := 0
	var_Items:[Link,"L1",exLinkWidth] := 2

530
Can I change the style of the link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkStyle] := 4

529
Can I change the color of the link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkColor] := 255

528
Can I change the part of the bar where the link ends

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkStartPos] := 1
	var_Items:[Link,"L1",exLinkEndPos] := 1

527
Can I change the part of the bar where the link starts

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkStartPos] := 0

526
How can I associate an extra data to a link

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkUserData] := "your data"

525
How can I show or hide a specified link
local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkEndBar] := false

524
How can I get the key of the bar where the link end

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:AddItem(var_Items:[Link,"L1",exLinkEndBar])

523
How can I get the key of the bar where the link starts

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:AddItem(var_Items:[Link,"L1",exLinkStartBar])

522
How can I get the handle of the item where the link ends

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:AddItem(var_Items:[Link,"L1",exLinkEndItem])

521
How can I get the handle of the item where the link starts

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:AddItem(var_Items:[Link,"L1",exLinkStartItem])

520
How can I enumerate the links in the chart

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:AddLink("L2",h2,"K2",h1,"K1")
	var_Items:AddItem(var_Items:FirstLink)
	var_Items:AddItem(var_Items:[NextLink,var_Items:FirstLink])

519
How can I access the properties and method of the link between two bars

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010101"),SToD("20010103"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:[Link,"L1",exLinkText] := "L<b>1</b>"

518
How can I remove a link between two bars
local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:ClearLinks()

517
How can I remove a link between two bars
local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")
	var_Items:RemoveLink("L1")

516
How do I add a link between two bars

local var_Items as IItems
local h1,h2 as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h1 := var_Items:AddItem("Task 1")
	var_Items:AddBar(h1,"Task",SToD("20010102"),SToD("20010104"),"K1",nil)
	h2 := var_Items:AddItem("Task 2")
	var_Items:AddBar(h2,"Task",SToD("20010105"),SToD("20010107"),"K2",nil)
	var_Items:AddLink("L1",h1,"K1",h2,"K2")

515
How do I find the number or count of bars in the item
local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010101"),SToD("20010102"),"K1",nil)
	var_Items:AddBar(h,"Task",SToD("20010104"),SToD("20010106"),"K2",nil)
	var_Items:[ItemBar,h,"K2",exBarCaption] := var_Items:[ItemBar,h,nil,exBarsCount]

514
How can I assign any extra data to a bar in the chart
local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPattern] := "your data"

513
Is there any way to change the background color for percent value being displayed on the progress bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress"):Shortcut := "Percent"
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Percent",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.35
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true
	var_Items:[ItemBar,h,"K1",exBarPercentCaptionFormat] := "<bgcolor=FF0000> %p%</bgcolor>"

512
Is there any way to change the color for percent value being displayed on the progress bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress"):Shortcut := "Percent"
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Percent",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.35
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true
	var_Items:[ItemBar,h,"K1",exBarPercentCaptionFormat] := "<fgcolor=FF0000>%p%</fgcolor>"

511
Is there any way to change the font for percent value being displayed on the progress bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress"):Shortcut := "Percent"
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Percent",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.35
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true
	var_Items:[ItemBar,h,"K1",exBarPercentCaptionFormat] := "<b><font Tahoma;12>%%p</font></b>"

510
Is there any way to align the percent value being displayed on the progress bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress"):Shortcut := "Percent"
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Percent",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.75
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true
	var_Items:[ItemBar,h,"K1",exBarPercentCaptionFormat] := "%p/100"
	var_Items:[ItemBar,h,"K1",exBarOffset] := 0

509
Is there any way to change the format of the percent being displayed on the progress bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress"):Shortcut := "Percent"
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Percent",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.4
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true
	var_Items:[ItemBar,h,"K1",exBarPercentCaptionFormat] := "<b>%p/100</b>"

508
How can I show or hide the percent value in the progress bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress"):Shortcut := "Percent"
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Percent",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.4
	var_Items:[ItemBar,h,"K1",exBarShowPercentCaption] := true

507
How can I change the percent value in a progress bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress"):Shortcut := "Percent"
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Percent",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.4

506
How can I add a percent bar

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Add("Task%Progress")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task%Progress",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarPercent] := 0.4

505
Can I add a bar in the chart, using your EBN files

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"",SToD("20010102"),SToD("20010105"),"K1"," EBN ")
	var_Items:[ItemBar,h,"K1",exBarBackColor] := 16777216
	var_Items:AddBar(h,"Task",SToD("20010106"),SToD("20010108"),"K2",nil)

504
How can I change the background color of the bar in the chart

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
oDCOCX_Exontrol1:Chart:Bars:Copy("Task","TaskR"):Color := RGB(255,0,0)
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"TaskR",SToD("20010102"),SToD("20010106"),"K1",nil)

503
How can I change the background color of the bar in the chart

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarBackColor] := 8421504

502
How can I change the background color of the HTML text or caption of the bar in the chart

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1",nil)
	var_Items:[ItemBar,h,"K1",exBarCaption] := "<bgcolor=FF0000> to do </bgcolor>"

501
How can I change the foreground color of the HTML text or caption of the bar in the chart

local var_Items as IItems
local h as USUAL

oDCOCX_Exontrol1:Columns:Add("Task")
oDCOCX_Exontrol1:Chart:FirstVisibleDate := SToD("20010101")
var_Items := oDCOCX_Exontrol1:Items
	h := var_Items:AddItem("Task 1")
	var_Items:AddBar(h,"Task",SToD("20010102"),SToD("20010106"),"K1","t<fgcolor=0000FF>o</fgcolor> do")
	var_Items:[ItemBar,h,"K1",exBarForeColor] := 16777215